home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-users-of-norman / CUON_25_(10-1984).d64 / color chart_64 (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  586b  |  14 lines
  1. 40 FOR I=49152 TO 49188: READ A: POKE I,A: NEXT:POKE 53280,11
  2. 50 PRINT CHR$(147):FOR I=1024 TO I+1000: POKE I,160: POKE I+54272,11:NEXTI
  3. 60 FOR I=0 TO 15: FOR J=0 TO 15
  4. 70 P=1196+(40*I)+J: POKE P,J+1: POKE P+54272,J: NEXT J,I
  5. 80 PRINT TAB(15)CHR$(5)"COLOR CHART":FOR I=1 TO 19:PRINT:NEXT
  6. 85 PRINT"THIS CHART SHOWS ALL COMBINATIONS OF   "
  7. 86 PRINT "FOREGROUND AND BACKGROUND COLORS.      "
  8. 87 PRINT "FOREGROUND INCREASES FROM LEFT TO RIGHT"
  9. 88 PRINT "BACKGROUND INCREASES FROM TOP TO BOTTOM";
  10. 90 SYS 12*4096
  11. 100 DATA 169,90,133,251,169,0,141,33,208,162,15,120
  12. 105 DATA 173,17,208,48,251,173,18,208
  13. 110 DATA 197,251,208,249,238,33,208,24,105,8,133,251,202,16,233,48,219
  14.